home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / CRESC / Lengths / length-rests-i < prev    next >
Lisp/Scheme  |  1996-12-31  |  737b  |  19 lines
  1. length-rests-i note-length length-pattern
  2.  
  3. This function is similar to length-repeat-i in that a length value can be selected and all occurences of that value be processed. Here, the processing changes all selected values to corresponding length-rests.
  4.  
  5. (length-rests-i '1/16 '(1/16 1/8 1/16 1/16 1/16))
  6. --> (-1/16 1/8 -1/16 -1/16 -1/16)
  7.  
  8. (length-rests-i 48 '(48 48 24))
  9. --> (-48 -48 24)
  10.  
  11. In combination with other length functions this function has the potential for creating most effective rhythmic polyphonies.
  12.  
  13. (setq rhy (append r1 (+r 1 4s) 5s 5s r2 (+r 1 4s) 
  14.                   7s 2e r3 r4 3-2e 2e r5))
  15.  
  16. (setq rhy1 (length-repeat-i 4 '1/4 
  17.                 (length-repeat-i 8 '1/2 
  18.                       (length-rests-i 48 rhy)))) 
  19.